home *** CD-ROM | disk | FTP | other *** search
/ Night Owl 7 / Night Owl Shareware (NOPV7)(Night Owl Publisher Inc.)(1992).bin / 038a / bash1_12.arj / BASH1-12.TAR / bash-1.12 / examples / functions / whence < prev    next >
Text File  |  1991-07-07  |  985b  |  64 lines
  1. #
  2. # An almost-ksh compatible `whence' command.  This is as hairy as it is 
  3. # because of the desire to exactly mimic ksh.
  4. # 
  5. # This depends somewhat on knowing the format of the output of the bash
  6. # `builtin type' command.
  7. #
  8. # Chet Ramey
  9. # chet@ins.CWRU.Edu
  10. #
  11.  
  12.  
  13. whence()
  14. {
  15.     local vflag
  16.     local path
  17.  
  18.     vflag=
  19.     path=
  20.     if [ "$#" = "0" ] ; then
  21.         echo "whence: argument expected"
  22.         return 1
  23.     fi
  24.     case "$1" in
  25.         -v) vflag=1
  26.             shift 1
  27.             ;;
  28.         -*) echo "whence: bad option: $1"
  29.             return 1
  30.             ;;
  31.          *) ;;
  32.     esac
  33.  
  34.     if [ "$#" = "0" ] ; then
  35.         echo "whence: bad argument count"
  36.         return 1
  37.     fi
  38.  
  39.     for cmd
  40.     do
  41.         if [ "$vflag" ]     ; then
  42.             echo $(builtin type $cmd | sed 1q)
  43.         else
  44.             path=$(builtin type -path $cmd)
  45.             if [ "$path" ] ; then
  46.                 echo $path
  47.             else
  48.                 case "$cmd" in
  49.                     /*) echo ""
  50.                         ;;
  51.                      *) case "$(builtin type -type $cmd)" in
  52.                         "") echo ""
  53.                             ;;
  54.                          *) echo "$cmd"
  55.                             ;;
  56.                         esac
  57.                         ;;
  58.                 esac
  59.             fi
  60.         fi
  61.     done
  62.     return 0
  63. }
  64.